﻿Public Class UserModel
  Private _Name As String
  Public _doneCount As Integer
  Public _inProgressCount As Integer
  Public _inProgressHours As Double
  Public _readyForTestCount As Integer
  Public _readyForTestHours As Double
  Public _notDoneCount As Integer
  Public _notDoneHours As Double
  Sub New()

  End Sub
  Sub New(ByVal name As String)
    _Name = name
  End Sub

  Public Property UserName() As String
    Get
      Return _Name
    End Get
    Set(ByVal value As String)
      _Name = value
    End Set
  End Property

  Public Property notDoneCount() As Integer
    Get
      Return _notDoneCount
    End Get
    Set(ByVal value As Integer)
      _notDoneCount = value
    End Set
  End Property
  Public Property doneCount() As Integer
    Get
      Return _doneCount
    End Get
    Set(ByVal value As Integer)
      _doneCount = value
    End Set
  End Property
  Public Property inProgressCount() As Integer
    Get
      Return _inProgressCount
    End Get
    Set(ByVal value As Integer)
      _inProgressCount = value
    End Set
  End Property
  Public Property inProgressHours() As Double
    Get
      Return _inProgressHours
    End Get
    Set(ByVal value As Double)
      _inProgressHours = value
    End Set
  End Property
  Public Property readyForTestCount() As Integer
    Get
      Return _readyForTestCount
    End Get
    Set(ByVal value As Integer)
      _readyForTestCount = value
    End Set
  End Property
  Public Property readyForTestHours() As Double
    Get
      Return _readyForTestHours
    End Get
    Set(ByVal value As Double)
      _readyForTestHours = value

    End Set
  End Property
  Public Property notDoneHours() As Double
    Get
      Return _notDoneHours
    End Get
    Set(ByVal value As Double)
      _notDoneHours = value
    End Set
  End Property
End Class
